/*
 * Copyright (c) 2010-2011, NVIDIA Corporation
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *   * Redistributions of source code must retain the above copyright
 *     notice, this list of conditions and the following disclaimer.
 *   * Redistributions in binary form must reproduce the above copyright
 *     notice, this list of conditions and the following disclaimer in the
 *     documentation and/or other materials provided with the distribution.
 *   * Neither the name of NVIDIA Corporation nor the
 *     names of its contributors may be used to endorse or promote products
 *     derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
 * DISCLAIMED. IN NO EVENT SHALL <COPYRIGHT HOLDER> BE LIABLE FOR ANY
 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

#include <nih/image/raw.h>
#include <stdio.h>

namespace nih {

// save an image in the most proprietary raw floating point format
bool save_raw(const char* filename, const Image<Vector3f>& image)
{
	FILE* file = fopen( filename, "wb" );
	if (file == NULL)
		return false;

	const char* magic = "RAWF";

	fwrite( magic, sizeof(uint32), 1u, file );

	const uint32 res_x = image.cols();
	const uint32 res_y = image.rows();

	fwrite( &res_x, sizeof(uint32), 1u, file );
	fwrite( &res_y, sizeof(uint32), 1u, file );

	// save line by line
	for (uint32 y = 0; y < res_y; y++)
		fwrite( &image[y][0], sizeof(float), res_x*3u, file );

	fclose( file );
	return true;
}

// load an image in the most proprietary raw floating point format
bool load_raw(const char* filename, Image<Vector3f>& image)
{
	FILE* file = fopen( filename, "rb" );
	if (file == NULL)
		return false;

	const char* magic = "RAWF";
    char header[5];

	fread( header, sizeof(uint32), 1u, file );
    header[4] = '\0';

    if (strcmp( header, magic ) != 0)
        return false;

	uint32 res_x;
	uint32 res_y;

	fread( &res_x, sizeof(uint32), 1u, file );
	fread( &res_y, sizeof(uint32), 1u, file );

    image.set( res_x, res_y );

	// read line by line
	for (uint32 y = 0; y < res_y; y++)
		fread( &image[y][0], sizeof(float), res_x*3u, file );

	fclose( file );
	return true;
}

} // namespace nih